home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 2 / BBS in a box - Trilogy II.iso / Files / Hyper / G / Get⁄Set Folder / Get⁄SetInvisible 1.1 / Get_SetInvisible 1.1 / cards.xml < prev    next >
Encoding:
Text File  |  1992-02-22  |  5.5 KB  |  148 lines

  1. card_2212.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>2212</id>
  6.     <filler1>0</filler1>
  7.     <bitmap>BMAP_4869.pbm</bitmap>
  8.     <cantDelete> <false /> </cantDelete>
  9.     <showPict> <true /> </showPict>
  10.     <dontSearch> <false /> </dontSearch>
  11.     <owner>2499</owner>
  12.     <link rel="stylesheet" type="text/css" href="stylesheet_3217.css" />
  13.     <part>
  14.         <id>9</id>
  15.         <type>field</type>
  16.         <visible> <true /> </visible>
  17.         <dontWrap> <false /> </dontWrap>
  18.         <dontSearch> <false /> </dontSearch>
  19.         <sharedText> <false /> </sharedText>
  20.         <fixedLineHeight> <false /> </fixedLineHeight>
  21.         <autoTab> <false /> </autoTab>
  22.         <lockText> <true /> </lockText>
  23.         <rect>
  24.             <left>1</left>
  25.             <top>86</top>
  26.             <right>511</right>
  27.             <bottom>309</bottom>
  28.         </rect>
  29.         <style>transparent</style>
  30.         <autoSelect> <false /> </autoSelect>
  31.         <showLines> <false /> </showLines>
  32.         <wideMargins> <false /> </wideMargins>
  33.         <multipleLines> <false /> </multipleLines>
  34.         <reservedFamily> 0 </reservedFamily>
  35.         <titleWidth>0</titleWidth>
  36.         <icon>0</icon>
  37.         <textAlign>left</textAlign>
  38.         <font>Monaco</font>
  39.         <textSize>9</textSize>
  40.         <textStyle>plain</textStyle>
  41.         <textHeight>12</textHeight>
  42.         <name></name>
  43.         <script></script>
  44.     </part>
  45.     <part>
  46.         <id>23</id>
  47.         <type>button</type>
  48.         <visible> <true /> </visible>
  49.         <reserved5> 0 </reserved5>
  50.         <reserved4> 0 </reserved4>
  51.         <reserved3> 0 </reserved3>
  52.         <reserved2> 0 </reserved2>
  53.         <reserved1> 0 </reserved1>
  54.         <enabled> <true /> </enabled>
  55.         <rect>
  56.             <left>473</left>
  57.             <top>51</top>
  58.             <right>511</right>
  59.             <bottom>84</bottom>
  60.         </rect>
  61.         <style>transparent</style>
  62.         <showName> <false /> </showName>
  63.         <highlight> <false /> </highlight>
  64.         <autoHighlight> <true /> </autoHighlight>
  65.         <sharedHighlight> <true /> </sharedHighlight>
  66.         <family>0</family>
  67.         <titleWidth>0</titleWidth>
  68.         <icon>15664</icon>
  69.         <textAlign>center</textAlign>
  70.         <font>Chicago</font>
  71.         <textSize>12</textSize>
  72.         <textStyle>plain</textStyle>
  73.         <name>Home</name>
  74.         <script>on mouseUpvisual dissolve to blackvisual dissolve to whitevisual dissolve to blackvisual dissolvego homeend mouseUp</script>
  75.     </part>
  76.     <part>
  77.         <id>24</id>
  78.         <type>button</type>
  79.         <visible> <true /> </visible>
  80.         <reserved5> 0 </reserved5>
  81.         <reserved4> 0 </reserved4>
  82.         <reserved3> 0 </reserved3>
  83.         <reserved2> 0 </reserved2>
  84.         <reserved1> 0 </reserved1>
  85.         <enabled> <true /> </enabled>
  86.         <rect>
  87.             <left>4</left>
  88.             <top>54</top>
  89.             <right>104</right>
  90.             <bottom>76</bottom>
  91.         </rect>
  92.         <style>rectangle</style>
  93.         <showName> <true /> </showName>
  94.         <highlight> <false /> </highlight>
  95.         <autoHighlight> <true /> </autoHighlight>
  96.         <sharedHighlight> <true /> </sharedHighlight>
  97.         <family>0</family>
  98.         <titleWidth>0</titleWidth>
  99.         <icon>0</icon>
  100.         <textAlign>center</textAlign>
  101.         <font>Chicago</font>
  102.         <textSize>12</textSize>
  103.         <textStyle>plain</textStyle>
  104.         <name>GetInvisible</name>
  105.         <script>on mouseUpanswer file "Choose a file to examine:"put it into appnameif appname = "" then exit to hypercardget GetInvisible(appname)if the number of chars of it ‚â§ 5 thenanswer "The invisible flag of ‚Äú" & appname & "‚Äù is" && it & "."elseanswer it with "Sorry"end ifend mouseUp</script>
  106.     </part>
  107.     <part>
  108.         <id>25</id>
  109.         <type>button</type>
  110.         <visible> <true /> </visible>
  111.         <reserved5> 0 </reserved5>
  112.         <reserved4> 0 </reserved4>
  113.         <reserved3> 0 </reserved3>
  114.         <reserved2> 0 </reserved2>
  115.         <reserved1> 0 </reserved1>
  116.         <enabled> <true /> </enabled>
  117.         <rect>
  118.             <left>108</left>
  119.             <top>54</top>
  120.             <right>208</right>
  121.             <bottom>76</bottom>
  122.         </rect>
  123.         <style>rectangle</style>
  124.         <showName> <true /> </showName>
  125.         <highlight> <false /> </highlight>
  126.         <autoHighlight> <true /> </autoHighlight>
  127.         <sharedHighlight> <true /> </sharedHighlight>
  128.         <family>0</family>
  129.         <titleWidth>0</titleWidth>
  130.         <icon>0</icon>
  131.         <textAlign>center</textAlign>
  132.         <font>Chicago</font>
  133.         <textSize>12</textSize>
  134.         <textStyle>plain</textStyle>
  135.         <name>SetInvisible</name>
  136.         <script>on mouseUpanswer file "Choose a file to work with:"put it into appnameif appname = "" then exit to hypercardif getInvisible(appname) thenanswer "Change Invisible flag to what?" with "True" or "False"elseanswer "Change Invisible flag to what?" with "False" or "True"end ifsetInvisible appname,itif the result ‚↠"" then answer the result with "Sorry"end mouseUp</script>
  137.     </part>
  138.     <content>
  139.         <layer>card</layer>
  140.         <id>9</id>
  141.         <text>GetInvisible takes one parameter, the pathname of the file you want to examine. SetInvisible takes two parameters, the pathname of the file and TRUE or FALSE indicating your choice of setting. Click on and/or examine the scripts of the buttons above to see how it works!A small shareware fee of $5 is requested if you use this external in any ‚Äúin-house‚Äù, shareware or freeware products. The registration fee for development and prototyping of a future commercial product is $10.  The registration fee for unlimited commercial use in a SINGLE ‚Äúfor sale‚Äù product is $15.  The fee for unlimited commercial use with MULTIPLE products is $25.   These are life-time registrations.  You are entitled to all future shareware updates without further cost.If you have questions or comments I can be reached through the following:Jeffrey Donald Iverson                        CompuServe:      76675,17723841 Whispering Way Drive SE #101             AppleLink:       ALL.AMERICANGrand Rapids MI  49546                        America Online:  ProX Jeff(616) 949-0346                                GEnie:           APOSTASY</text>
  142.     </content>
  143.     <name></name>
  144.     <script></script>
  145. </card>
  146.  
  147.  
  148.